packs <- c('dplyr', 'readstata13', 
           'stringr', 'estimatr', 'lubridate', 'mice', 
           'ggplot2', 'ggthemes', 'purrr', 'fixest', 
           'tmap', 'countrycode', 'cowplot', 'xtable')
lapply(packs, require, character.only = T)

setwd("~/Dropbox/Argentina project/_effects_of_tj_replication")

source('clean/clean.R')

#All figures
list.files("fig", full.names = TRUE) %>% purrr::walk(source)

#All tables
list.files("tab", full.names = TRUE) %>% purrr::walk(source)

rm(list=ls())